home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Mac Game Programming Gurus / TricksOfTheMacGameProgrammingGurus.iso / Tools / Preditor 2.0 / Preditor Folder / Preditor.startup < prev    next >
Encoding:
Text File  |  1991-12-26  |  1.4 KB  |  63 lines  |  [TEXT/TCEd]
  1. #
  2. #    Preditor.startup
  3. #
  4. #    Last Modified: Friday, June 27, 1991 at 11:46 PM
  5. #
  6. #    The script is executed when the Preditor application is
  7. #    invoked, as long as the script resides in the "Preditor
  8. #    Folder".  Note that any file ending in ".startup" will
  9. #    be executed.
  10. #
  11. #    You can customize this file as you wish, or add your own
  12. #    ".startup" file.
  13. #
  14. #    © Copyright Evatac Software  1988-1991
  15. #    All rights reserved
  16. #
  17.  
  18. #  Run the common key assignment macros
  19.  
  20. ":Macros:Key Assignment Examples"()
  21.  
  22. AddMenu "Next Pascal Function"
  23.     Search("p", "^[ \\t]*procedure|^[ \\t]*function", ∂
  24.            NULL, ~Active)
  25.     Select([§]≥0, ~Active)
  26.     Search("p", "[A-Za-z_][A-Za-z0-9_]*", NULL, ~Active)
  27. EndMenu
  28.  
  29. AddMenu "Next C Function"
  30.     Search("p", "^[A-Za-z_][A-Za-z0-9_]* [A-Za-z_][A-Za-z0-9_]*\\(", ∂
  31.            Null, ~Active)
  32.     Select([§]≤0, ~Active)
  33.     Search("p", "[A-Za-z_][A-Za-z0-9_]*", NULL, ~Active)
  34. EndMenu
  35.  
  36. AddMenu "Show File"
  37.     ShowLine(~Active)
  38. EndMenu
  39.  
  40. #  Uncomment this for a larger screen - or set to your preference 
  41.  
  42. # ~NewWindowRect = "5, 5, 430, 550"
  43.  
  44.  
  45. #  Uncomment this if you don't want macro command to be displayed
  46. #  in the status window as they are executed.  Speeds up time 
  47. #  intensive loops by a about 5 times.
  48.  
  49. # ~ShowCommand = 0
  50.  
  51.  
  52. #  Uncomment this if you like to have a introduction greet you 
  53. #  when you startup Preditor.  Modify the Introduction script to
  54. #  change the introduction
  55.  
  56. # ":Macros:Introduction"()
  57.  
  58.  
  59. #  Look here for Macros
  60. MacroDir(":Macros:")
  61.  
  62. Open("Worksheet")
  63.